frmAddBotCommand.Show
frmAddBotCommand.cboAddType.Listindex = 1
